`timescale 10ns/1ns
module wave2;
reg wave;
parameter cycle=5;

initial fork
    #(0*cycle) wave = 0;
    #(1*cycle) wave = ~wave;
    #(2*cycle) wave = ~wave;
    #(3*cycle) wave = ~wave;
    #(4*cycle) wave = ~wave;
    #(5*cycle) wave = ~wave;
    #(6*cycle) $finish;
join

initial $monitor($time,,,"wave=%b",wave);

endmodule